// TOWN SPECIAL ENCOUNTERS
//    Town 38: Keep of Rentar-Ihrno

beginzonescript;

variables;

short im_hostile = 0;
short max_crime = 200;
short last_abil;
short counter = 0;
short set_ter = 0;
short set_ter2 = 0;

body;

beginstate INIT_STATE;
	last_abil = get_current_tick();

	set_name(3833,"Ganotha-Ihrno");
	set_boss_level(3833,1);

	set_name(3872,"Gyxx-Ihrno");
	set_boss_level(3872,1);
	
	if (gf(38,18) == 1) {
		spawn_creature(3814);
		set_attitude(3814,4);
		}

//	add_range_to_group(,,groupn);

	if (gf(64,9) > 0) {
		activate_hidden_group(20);
		set_name(30020,"Rentar Construct");
		set_summon_level(30020,1);
		set_aggression(30020,50);
		set_level(30020,30);
		if (difficulty() > 1)
			set_new_abil(30020,14);
		}
		
	set_crime_tolerance(max_crime);

	break;

beginstate EXIT_STATE;
break;

beginstate START_STATE;
	if ((set_ter == 0) && (gf(38,1) > 0)) {
		set_ter = 1;
		set_attitude(30001,10);
		}

	// make sure downstairs flags set
	if (gf(64,8) == 0) {
		sf(64,8,1);
		sf(64,10,1);
		sf(64,12,1);
		sf(64,13,1);
		sf(64,14,1);
		sf(64,19,1);
		}

		
	if ((gf(38,8) == 3) && (gf(38,26) == 0)) {
		//WIN!!!
		ok_dlog(65,3);
			toggle_cutscene(1);
			run_game_hardcode(14);
			
		}
		
	if (gf(38,26) > 0) {
		if (gf(38,26) == 1) {
			set_name(3894,"Rentar-Ihrno");
			set_name(3895,"Empress Prazac");
			set_name(3896,"Solberg");
			set_name(3899,"Anaximander");
			inc_flag(38,26,1);
			//sf(38,26,39);
			}
		else if (gf(38,26) == 2) {
			set_cutscene_text(0,3,"The reaction is set in motion ...");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 3) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 4) {
			give_char_text_bubble(3894,"You fool!");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 5) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 6) {
			give_char_text_bubble(3894,"What have you done?");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 7) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 8) {
			play_sound(159);
			give_char_text_bubble(get_pc_id(0),"Aaaah!");
			create_projectile_rain(40,32, 144, 8);
			set_cutscene_text_vis(0,2);
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 9) {
			play_sound(165);
			give_char_text_bubble(get_pc_id(0),"");
			give_char_text_bubble(get_pc_id(2),"Run!");
			create_projectile_rain(40,32, 205, 8);
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 10) {
			give_char_text_bubble(get_pc_id(2),"");
			give_char_text_bubble(get_pc_id(1),"It's too late!");
			play_sound(159);
			create_projectile_rain(40,32, 204, 8);
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 11) {
			give_char_text_bubble(get_pc_id(1),"");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 12) {
			give_char_text_bubble(3894,"Curse you!");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 13) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 14) {
			give_char_text_bubble(3894,"My fortress is lost,");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 15) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 16) {
			give_char_text_bubble(3894,"but you shall die with it.");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 17) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 18) {
			give_char_text_bubble(3894,"Farewell, fool!");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 19) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 20) {
			give_char_text_bubble(3894,"DIE!");
			give_char_text_bubble(get_pc_id(0),"Uh oh.");
			create_projectile_rain(40,32, 144, 8);
			create_projectile_rain(40,32, 205, 8);
			play_sound(159);
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 21) {
			give_char_text_bubble(get_pc_id(1),"It's all falling apart!");
			create_projectile_rain(40,32, 205, 8);
			create_projectile_rain(40,32, 204, 8);
			play_sound(159);
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 22) {
			give_char_text_bubble(3894,"");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 23) {
			set_view_center(34,52);
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 24) {
			set_cutscene_text(0,3,"Meanwhile,");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 25) {
			set_cutscene_text(1,3,"in Blackcrag Fortress ...");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 26) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 27) {
			set_cutscene_text_vis(0,0);
			set_cutscene_text_vis(1,0);
			give_char_text_bubble(3895,"Have they succeeded?");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 28) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 29) {
			give_char_text_bubble(3895,"");
			give_char_text_bubble(3896,"One moment ...");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 30) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 31) {
			give_char_text_bubble(3896,"");
			play_sound(106);
			create_projectile_rain(35,53, 210, 1);
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 32) {
			give_char_text_bubble(3896,"I see them! They have won!");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 33) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 34) {
			give_char_text_bubble(3896,"");
			give_char_text_bubble(3895,"  Then rescue them!");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 35) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 36) {
			give_char_text_bubble(3896,"");
			set_view_center(38,32);
			give_char_text_bubble(get_pc_id(0),"At least I won.");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 37) {
			create_projectile_rain(40,32, 144, 8);
			create_projectile_rain(40,32, 205, 8);
			create_projectile_rain(40,32, 204, 8);
			play_sound(159);
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 38) {
			give_char_text_bubble(get_pc_id(0),"Oh well.");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 39) {
			if (char_ok(get_pc_id(0))) 
			give_char_text_bubble(get_pc_id(0),"");
			if (char_ok(get_pc_id(0))) 
			run_sparkles_on_char(get_pc_id(0),4,20,0);
			if (char_ok(get_pc_id(1))) 
			run_sparkles_on_char(get_pc_id(1),4,20,0);
			if (char_ok(get_pc_id(2))) 
			run_sparkles_on_char(get_pc_id(2),4,20,0);
			if (char_ok(get_pc_id(3))) 
			run_sparkles_on_char(get_pc_id(3),4,20,0);
			play_sound(189);
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 40) {
			if (char_ok(get_pc_id(0))) 
			relocate_char(get_pc_id(0),8,29,TRUE); // move pcs
			if (char_ok(get_pc_id(1))) 
			relocate_char(get_pc_id(1),9,29,TRUE); // move pcs
			if (char_ok(get_pc_id(2))) 
			relocate_char(get_pc_id(2),10,29,TRUE); // move pcs
			if (char_ok(get_pc_id(3))) 
			relocate_char(get_pc_id(3),11,29,TRUE); // move pcs
			set_facing(30000,5);
			give_char_text_bubble(3894,"NO!");

			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 41) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 42) {
			give_char_text_bubble(3894,"");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 43) {
			set_view_center(34,52);
			give_char_text_bubble(3895,"Hurry!");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 44) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 45) {
			give_char_text_bubble(3895,"");
			give_char_text_bubble(3896,"I have them!");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 46) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 47) {
			give_char_text_bubble(3896,"");
			if (char_ok(get_pc_id(0))) {
				relocate_char(get_pc_id(0),33,52,TRUE); // move pcs
				play_sound(189);
				run_sparkles_on_char(get_pc_id(0),4,20,0);
				set_facing(get_pc_id(0),5);
				give_char_text_bubble(3895,"Welcome back!");
				}
			inc_flag(38,26,1);
			if (char_ok(get_pc_id(1)) == FALSE) 
				inc_flag(38,26,1);
			}
		else if (gf(38,26) == 48) {
			if (char_ok(get_pc_id(1))) {
			relocate_char(get_pc_id(1),33,53,TRUE); // move pcs
				play_sound(189);
				run_sparkles_on_char(get_pc_id(1),4,20,0);
				set_facing(get_pc_id(1),5);
				give_char_text_bubble(3895,"Welcome back!");
				}
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 49) {
			if (char_ok(get_pc_id(2))) {
			relocate_char(get_pc_id(2),33,51,TRUE); // move pcs
				play_sound(189);
				run_sparkles_on_char(get_pc_id(2),4,20,0);
				set_facing(get_pc_id(2),5);
				give_char_text_bubble(3895,"Welcome back!");
				}
			inc_flag(38,26,1);
			if (char_ok(get_pc_id(3)) == FALSE) 
				inc_flag(38,26,1);
			}
		else if (gf(38,26) == 50) {
			if (char_ok(get_pc_id(3))) {
			relocate_char(get_pc_id(3),33,54,TRUE); // move pcs
				set_facing(get_pc_id(3),5);
				play_sound(189);
				run_sparkles_on_char(get_pc_id(3),4,20,0);
				give_char_text_bubble(3895,"Welcome back!");
				}
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 51) {
			give_char_text_bubble(3895,"");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 52) {
			give_char_text_bubble(random_group_member(0),"What happened?");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 53) {
			give_char_text_bubble(30000,"");
			give_char_text_bubble(3895,"You succeeded.");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 54) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 55) {
			give_char_text_bubble(3895,"We were watching you,");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 56) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 57) {
			give_char_text_bubble(3895,"so that we could save you.");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 58) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 59) {
			if (gf(4,0) < 3)
				give_char_text_bubble(3895,"We have come full circle.");
				else give_char_text_bubble(3895,"I know that you are Anama.");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 60) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 61) {
			if (gf(4,0) < 3)
				give_char_text_bubble(3895,"The people of Avernum,");
				else give_char_text_bubble(3895,"I assure you we will");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 62) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 63) {
			if (gf(4,0) < 3)
				give_char_text_bubble(3895,"who we abused so severely,");
				else give_char_text_bubble(3895,"think more kindly on your faith");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 64) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 65) {
			if (gf(4,0) < 3)
				give_char_text_bubble(3895,"have returned to save us.");
				else give_char_text_bubble(3895,"in the future.");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 66) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 67) {
			give_char_text_bubble(3895,"");
			give_char_text_bubble(random_group_member(0),"It was not a problem.");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 68) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 69) {
			give_char_text_bubble(30000,"");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 70) {
			give_char_text_bubble(3895,"It is time for rewards.");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 71) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 72) {
			give_char_text_bubble(3895,"Bring Anaximander here.");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 73) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 74) {
			give_char_text_bubble(3895,"");
			give_char_text_bubble(3896,"As you command.");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 75) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 76) {
			give_char_text_bubble(3896,"");
			play_sound(189);
			relocate_char(3899,35,50,TRUE); 
			run_sparkles_on_char(3899,4,20,0);
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 77) {
			give_char_text_bubble(3899,"Aaah!");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 78) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 79) {
			give_char_text_bubble(3899,"");
			set_facing(3895,7);
			give_char_text_bubble(3895,"Greetings, Anaximander.");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 80) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 81) {
			give_char_text_bubble(3899,"Your Majesty.");
			give_char_text_bubble(3895,"");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 82) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 83) {
			give_char_text_bubble(3899,"");
			give_char_text_bubble(3895,"They completed their task.");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 84) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 85) {
			give_char_text_bubble(3899,"So I gathered.");
			give_char_text_bubble(3895,"");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 86) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 87) {
			give_char_text_bubble(3899,"");
			give_char_text_bubble(3895,"I will meet my end of our bargain.");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 88) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 89) {
			give_char_text_bubble(3895,"I grant to Avernum");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 90) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 91) {
			give_char_text_bubble(3895,"the lands of southern Valorim.");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 92) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 93) {
			give_char_text_bubble(3895,"They are mostly unsettled");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 94) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 95) {
			give_char_text_bubble(3895,"There, you may have the peace");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 96) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 97) {
			give_char_text_bubble(3895,"that you have earned.");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 98) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 99) {
			give_char_text_bubble(3899,"Avernum thanks your majesty.");
			give_char_text_bubble(3895,"");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 100) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) ==  101) {
			set_facing(3895,1);
			give_char_text_bubble(3895,"And for you, adventurer.");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 102) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 103) {
			give_char_text_bubble(3895,"First, you shall be given");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 104) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 105) {
			give_char_text_bubble(3895,"one thousand gold pieces!");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 106) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 107) {
			give_char_text_bubble(3895,"In addition, I declare you to be");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 108) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 109) {
			give_char_text_bubble(3895,"a Dervish of the Empire!");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 110) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 111) {
			give_char_text_bubble(3895,"");
			give_char_text_bubble(3897,"Hmmph.");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 112) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 113) {
			give_char_text_bubble(3897,"");
			set_cutscene_text(0,3,"Prazac turns to sit down.");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 114) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 115) {
			set_cutscene_text(1,3,"Suddenly ...");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 116) {
			play_sound(189);
			relocate_char(3894,31,52,TRUE); 
			run_sparkles_on_char(3894,4,20,0);
			set_facing(3894,5);
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 117) {
			set_cutscene_text(1,3,"The shade of Rentar-Ihrno appears.");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 118) {
			set_cutscene_text(2,3,"The projection's head is bowed in defeat.");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 119) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 120) {
			set_cutscene_text_vis(0,0);
			set_cutscene_text_vis(1,0);
			set_cutscene_text_vis(2,0);
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 121) {
			give_char_text_bubble(3895,"Why are you here?");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 122) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 123) {
			give_char_text_bubble(3895,"Come to cause more death?");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 124) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 125) {
			give_char_text_bubble(3895,"");
			give_char_text_bubble(3894,"No.");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 126) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 127) {
			give_char_text_bubble(3894,"We have been defeated.");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 128) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 129) {
			give_char_text_bubble(3894,"But ...");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 130) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 131) {
			give_char_text_bubble(3894,"Our memories are eternal.");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 132) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 133) {
			give_char_text_bubble(3894,"One day, your children");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 134) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 135) {
			give_char_text_bubble(3894,"will pay in blood for your crimes.");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 136) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 137) {
			give_char_text_bubble(3894,"The Souls cry for vengeance.");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 138) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 139) {
			give_char_text_bubble(3894,"Never forget!");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 140) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 141) {
			give_char_text_bubble(3894,"");
			play_sound(189);
			run_sparkles_on_char(3894,4,20,0);
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 142) {
			relocate_char(3894,41,32,TRUE); 
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 143) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 144) {
			give_char_text_bubble(3895,"We will not forget");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 145) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 146) {
			give_char_text_bubble(3895,"");
			give_char_text_bubble(random_group_member(0),"We almost stopped her.");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 147) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 148) {
			give_char_text_bubble(random_group_member(0),"");
			give_char_text_bubble(3895,"It does not matter.");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 149) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 150) {
			give_char_text_bubble(3895,"We will pay for our crimes");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 151) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 152) {
			give_char_text_bubble(3895,"for many years to come.");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 153) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 154) {
			give_char_text_bubble(3895,"But enough of that!");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 155) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 156) {
			give_char_text_bubble(3895,"It is time to celebrate!");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 157) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 158) {
			give_char_text_bubble(3895,"A crowd awaits outside!");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 159) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 160) {
			give_char_text_bubble(3895,"");
			set_view_center(31,9);
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 161) {
			set_cutscene_text(0,3,"You walk out into the sun");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 162) {
			set_cutscene_text(1,3,"to bask in the cheers");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 163) {
			set_cutscene_text(2,3,"of the Empire's people.");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 164) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 165) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 166) {
			set_cutscene_text_vis(0,2);
			set_cutscene_text_vis(1,2);
			set_cutscene_text_vis(2,2);
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 167) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 168) {
			set_cutscene_text(0,3,"After so many years of struggle,");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 169) {
			set_cutscene_text(1,3,"the people of Avernum");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 170) {
			set_cutscene_text(2,3,"will know peace at last.");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 171) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 172) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 173) {
			set_cutscene_text_vis(0,2);
			set_cutscene_text_vis(1,2);
			set_cutscene_text_vis(2,2);
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 174) {
			set_cutscene_text(1,3,"THE END");
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 175) {
			inc_flag(38,26,1);
			}
		else if (gf(38,26) == 176) {
			sf(38,26,200);
			}
		else if (gf(38,26) == 200) {
			//run_game_hardcode(13);
			set_cutscene_text_vis(1,0);
			sf(38,27,1);
			toggle_cutscene(0);
			inc_flag(38,26,1);
			}

		}
	break;

beginstate 10;
	if ((char_ok(3814)) && (get_attitude(3814) == 4))
		set_attitude(3814,3);
		
break;

beginstate 11;
	if ((char_ok(3814)) && (get_attitude(3814) == 3))
		set_attitude(3814,4);
break;

beginstate 12;
	if (set_ter2 == 0) {
		set_ter2 = 1;
		set_attitude(30002,10);
		set_attitude(30020,10);
		}
break;

beginstate 13;
break;

beginstate 14;
break;

//	print_str("");
//	set_terrain_string_range("",1);
//	set_terrain_string_range("The sign says - .",1);

